home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 8
/
CD Funhouse Version 8.0 - Wayzata Technology (7013) (1993).iso
/
pc
/
mac
/
__intere
/
the_magi.c_s
/
background_2715.txt
< prev
next >
Wrap
Text File
|
1990-10-06
|
20KB
|
972 lines
-- background: 2715 from stack: in.c_s
-- bmap block id: 3241
-- flags: 0000
-- background id: 0
-- name:
----- HyperTalk script -----
on openBackground
push recent card
end openBackground
-- part 7 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=85 top=86 right=118 bottom=117
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: a
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field a
hide field b
hide field c
hide field d
hide field e
hide field f
hide field k
hide field p
hide field u
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 8 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=122 top=86 right=118 bottom=155
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: b
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field a
hide field b
hide field c
hide field d
hide field e
hide field g
hide field l
hide field q
hide field v
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 9 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=160 top=86 right=118 bottom=193
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: c
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field a
hide field b
hide field c
hide field d
hide field e
hide field h
hide field m
hide field r
hide field w
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 10 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=198 top=86 right=118 bottom=231
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: d
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field a
hide field b
hide field c
hide field d
hide field e
hide field i
hide field n
hide field s
hide field x
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 11 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=236 top=86 right=118 bottom=267
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: e
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field a
hide field b
hide field c
hide field d
hide field e
hide field j
hide field o
hide field t
hide field y
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 12 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=85 top=123 right=156 bottom=117
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: f
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field f
hide field g
hide field h
hide field i
hide field j
hide field a
hide field k
hide field p
hide field u
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 13 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=122 top=123 right=156 bottom=155
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: g
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field f
hide field g
hide field h
hide field i
hide field j
hide field b
hide field l
hide field q
hide field v
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 14 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=160 top=123 right=156 bottom=193
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: h
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field f
hide field g
hide field h
hide field i
hide field j
hide field c
hide field m
hide field r
hide field w
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 15 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=198 top=123 right=156 bottom=231
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: i
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field f
hide field g
hide field h
hide field i
hide field j
hide field d
hide field n
hide field s
hide field x
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 16 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=236 top=123 right=156 bottom=267
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: j
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field f
hide field g
hide field h
hide field i
hide field j
hide field e
hide field o
hide field t
hide field y
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 18 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=85 top=161 right=194 bottom=117
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: k
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field k
hide field l
hide field m
hide field n
hide field o
hide field a
hide field f
hide field p
hide field u
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 19 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=122 top=161 right=194 bottom=155
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: l
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field k
hide field l
hide field m
hide field n
hide field o
hide field b
hide field g
hide field q
hide field v
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 20 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=160 top=161 right=194 bottom=193
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: m
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field k
hide field l
hide field m
hide field n
hide field o
hide field c
hide field h
hide field r
hide field w
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 21 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=198 top=161 right=194 bottom=231
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: n
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field k
hide field l
hide field m
hide field n
hide field o
hide field d
hide field i
hide field s
hide field x
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 22 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=236 top=161 right=194 bottom=267
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: o
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field k
hide field l
hide field m
hide field n
hide field o
hide field e
hide field j
hide field t
hide field y
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 23 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=85 top=199 right=232 bottom=117
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: p
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field p
hide field q
hide field r
hide field s
hide field t
hide field a
hide field f
hide field k
hide field u
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 24 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=122 top=199 right=232 bottom=155
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: q
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field p
hide field q
hide field r
hide field s
hide field t
hide field b
hide field g
hide field l
hide field v
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 25 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=160 top=199 right=232 bottom=193
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: r
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field p
hide field q
hide field r
hide field s
hide field t
hide field c
hide field h
hide field m
hide field w
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 27 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=198 top=199 right=232 bottom=231
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: s
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field p
hide field q
hide field r
hide field s
hide field t
hide field d
hide field i
hide field n
hide field x
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 28 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=236 top=199 right=232 bottom=267
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: t
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field p
hide field q
hide field r
hide field s
hide field t
hide field e
hide field j
hide field o
hide field y
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 29 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=85 top=237 right=268 bottom=117
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: u
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field u
hide field v
hide field w
hide field x
hide field y
hide field a
hide field f
hide field k
hide field p
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 30 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=122 top=237 right=268 bottom=155
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: v
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field u
hide field v
hide field w
hide field x
hide field y
hide field b
hide field g
hide field l
hide field q
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 31 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=160 top=237 right=268 bottom=193
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: w
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field u
hide field v
hide field w
hide field x
hide field y
hide field c
hide field h
hide field m
hide field r
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 32 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=198 top=237 right=268 bottom=231
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: x
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field u
hide field v
hide field w
hide field x
hide field y
hide field d
hide field i
hide field n
hide field s
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 33 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=236 top=237 right=268 bottom=267
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 24
-- part name: y
----- HyperTalk script -----
on mouseUp
global fNo
put fnO+1 into fNo
if fNo = 5 then
play boing c a fh
end if
put "no" & fNo into fld
hide field u
hide field v
hide field w
hide field x
hide field y
hide field e
hide field j
hide field o
hide field t
do "put line 1 of me into field" && fld
put field no1+field no2+field no3+field no4+field no5 into field total
end mouseup
-- part 34 (field)
-- low flags: 01
-- high flags: 0004
-- rect: left=287 top=219 right=255 bottom=454
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prediction
-- part 35 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=287 top=75 right=101 bottom=321
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 22
-- part name: no1
-- part 36 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=287 top=102 right=128 bottom=321
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 22
-- part name: no2
-- part 37 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=287 top=129 right=155 bottom=321
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 22
-- part name: no3
-- part 38 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=287 top=156 right=182 bottom=321
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 22
-- part name: no4
-- part 39 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=287 top=183 right=209 bottom=321
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 22
-- part name: no5
-- part 40 (field)
-- low flags: 01
-- high flags: 0004
-- rect: left=329 top=176 right=209 bottom=369
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 2048
-- line height: 24
-- part name: Total
-- part 41 (field)
-- low flags: 81
-- high flags: 0004
-- rect: left=129 top=139 right=208 bottom=388
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: SW Info